function [ data,timedata ] = getpdata( code, Sec )
%   getpdata()
%   输入代码code,可以获得实时的证券数据
%   注意：如果要获取实时的指数代码，通常是000开头的sh，这时要注意添加Sec项
%% 读取1sina的股票文本数据

if nargin==1
    if strmatch('600',code);
        Sec = 'sh';%600为上交所
    end
    if strmatch('000',code);
        Sec='sz';%000为深交所
    end
end

url = strcat('http://hq.sinajs.cn/list=',Sec,code);
textdata = urlread(url);

dh = strfind(textdata,','); %该文本是以逗号分隔数据的

%% 找出文本中的数据

for i = 1:length(dh)-3
    data(i,:) = str2num(textdata(dh(i)+1:dh(i+1)-1));
end

for i = length(dh)-2:length(dh)-1
    timedata(i-length(dh)+3,:) = cellstr(textdata(dh(i)+1:dh(i+1)-1));
end


end

